home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1990: Discy Business / Discy Business.2mg / DEV.CD / GUIDED.TOURS / GS.PTD / SCRIPTS / WP.SCP < prev   
Encoding:
Text File  |  1988-05-08  |  10.5 KB  |  568 lines  |  [04] ASCII Text (0x0000)
  1.  
  2. %if¶backÏinkÌenu
  3. %code∞≥
  4. %bcolor∞Êcolor≥Âscreenalette≥20∞±5±5±5‚order¥
  5. %window∞∑0∂40≤00
  6. œneÌoment,lease.†Your¡pple¶NÈsreparingÙheÛection„alled
  7. ¢Word–rocessing."†(Don'tÊorget--whenever˘ou˜antÙoÁo‚ackÙoÙhe
  8. ÌainÌenu,ÍustressÙhe≈scÎey.)
  9. %s∂¢%bcolor±˜indow≥4≥4µ76±73ÊontÌonaco.9"
  10. %s∑¢%bcolor±ÊontÌonaco.9Ìoveto≥4¥5"
  11. %s∏¢%window≥2±33≥92±92"
  12. %s≈¢%bcolor±˜indow≥4≥4µ76±73Â"
  13. %sΔ¢%fontÌonaco.9¿wt∞∞„enterÔffÛ±˜p.txt"
  14. %s«¢%code≤≤2ÊontÛys„enterÔn‚color≥"
  15. %sĢKing"
  16. %code≤∞˜ait∞
  17. %loadinst¥Ûtring‚ass.l¢"˜ait∞
  18. %loadinst≤‰rumËidrum.w¢"˜ait∞
  19. %loadinst≥‰rumÏodrum.w¢"˜ait∞
  20. %loadinst±ÁuitarÁuitar.l¢"˜ait∞
  21. %preloadÛfx/menu2open.song
  22. %preloadÛfx/menu2exit.song
  23. %preloadÁfx/m2.02††wait∞
  24. %preload‰ata/wp.menu˜ait∞
  25. %preload‰ata/wp.txt†wait∞
  26. %preloadÁfx/m1.06†˜ait∞
  27. %preloadÁfx/m1.06a†wait∞
  28. %preloadÁfx/cues˜ait∞
  29. %preloadÁfx/altcues˜ait∞
  30. %code∞≤
  31. %sfxÌenu2open
  32.  
  33. %m 1
  34. %if¶back„uesÔffÊontÛys
  35. %bcolor∞Êcolor≥Âscreenalette≥20∞±5±5±5
  36. %escreen
  37. %window∞∞∂40≤00
  38. %cues¥54±82
  39. %gfx∞Ì1.06π4±9
  40. %gfxpart±Ì1.06a≤84≥6≤42∑8¥80±55
  41. %BOLDœN˜indowµ4±33¥12≤00˜rapÔn
  42. WORD–ROCESSING
  43. %boldÔff
  44.  
  45. A˜ordrocessingrogramuts·¢sheetÔfaper"ÔnÙhe
  46. screenÊor˘ouÙoÛtartÙypingÔn.…t'sÏikeısing·
  47. typewriter,‚ut˜ithoutÙheroblemsÙhat„anÌake
  48. typingÛuch·‚other.
  49. %windowµ4±51¥12≤00
  50. %get act
  51.  
  52. %m 2
  53. %cuesÔff‚color±alette≥20µ±3±5±5
  54. %palette∂40±±3±5±5
  55. %escreen˜indow∞∞∂40≤00
  56. %palette∂40∞†0†0†0alette∂40≥±5±5±5†palette∂40≤†2†8†8
  57. %newmenu‰ata/wp.menu
  58. %cues¥54±82Áfx∞Ì2.02≤0±6‚color≥Êcolor∞Û≥∞
  59. %fontÌonaco.9
  60. %centerÔff˜rapÔn
  61. %moveto≤60≤6‚oldÔn
  62. Expedition ournal
  63. %boldÔff„enterÔnÊontÛys
  64. %box±2±27≥90±96
  65. Suppose˘ou're˜riting·n·ccountÔf˘ourÏatest
  66. wildernessÂxpedition.Ÿou're·boutÙo‚eginÔn
  67. Chapter≥8.”eeÙhe‚linkingÏine·tÙheÙopÔfÙhe
  68. screen?…t's„alledÙheÈnsertionoint.◊hen˘ouÙype,
  69. the˜ords‚egin˜hereÙheÈnsertionoint·ppears.
  70. %x &7 get "" 0 bcolor 3 font sys
  71.  
  72. %m 3
  73. %unbox
  74. %if¶backΩ∞Ûkip±
  75. %w
  76. %box±2±42¥42±96
  77. Type
  78. %boldÔn
  79. Chapter≥8
  80. %boldÔff
  81. andress“eturn.†(If˘ou
  82. make·Ìistake,ressƒeleteÙoÂraseÈt
  83. andÙhenÚetype.)
  84. %sµ¢chapter≥8"Û¥¢Chapter≥8"ÏcÔn¯¶7
  85. %get "" 20 bcolor 3 font sys
  86. %if¶ansÛ<>¶5Ûkip±
  87. %sfx≤
  88. 2†8∂0∞±10
  89. 2†8∂0∞±10
  90. %w
  91. %if®&ansÛ<>¢")·nd®&ansÛ<>¶5)ÚemÈnp¯¶7ÍÁet
  92. %unboxÊontÌonaco.9¯¶E
  93. Chapter≥8
  94. %bcolor≥ÊontÛys
  95.  
  96. %m 4
  97. %if¶backınbox‚color±Âraserect≥4¥6µ76±73‚color≥
  98. %box±2±42¥22±96
  99. Good.…nÙheÛame˜ay,˘ou'dÁoÔnÙoÙype
  100. theÓextÊewaragraphs.◊e'll‰oÙhemÊor
  101. you,·sÛoon·s˘ou„lickÙheΔorward·rrow
  102. orress“eturn.
  103. %get act
  104.  
  105. %m 5
  106. %unboxÛ≤¢except±4±5"¯¶6
  107. %if¶backÂ
  108. %x¶F¯¶G
  109. %if¶backÛ≥∞Û≤∞
  110. %if˛&backÛkip±
  111. %wrapÔn„enterÔnÊontÛys
  112. %w
  113. %box±2±42¥42±96
  114. NowÛuppose˘ou˜antÙo„hange·˜ord,ÔrÙakeÔut·Ûentence.
  115. You„anıseÙheÌouseÙoÛelectÙheÙext˘ou˜antÙo˜ork˜ith.
  116. Press“eturnÙoÙryÈt.
  117. %get act
  118. %box∏π4µ74±80Ûπ∞˜rapÔff
  119. %m 6
  120. %if˛&backÛkip±
  121. %if¶CÛkip±
  122. %unboxÛ≤¢except±4±5"¯¶E¯¶F¯¶G
  123. %box∏π4µ74±80Ûπ∞
  124. %w
  125. %wrapÔffÂ
  126. ToÛelectÛomeÙext:
  127.  
  128. &P–laceÙheointer·tÙhe‚eginningÔf·˜ordÔrÛentence.
  129. &P–ress·ndËoldÙheÌouse‚utton.
  130. &Pƒrag·crossÙheÙextÙoËighlightÈt.
  131.  
  132. PracticeÛelectingÙextÔnÙhisage.†When˘ou're
  133. readyÙoÁoÔn,„lickÙheΔorward·rrowÔrress“eturn.
  134. %s±¶AÛ≤¶B˜rapÔn
  135. %point
  136. %s√∞
  137. %window≥4≥4µ76±73ÊontÌonaco.9
  138. %s·rea±∞∞∞¥
  139. %code≤∂ÊontÛys
  140. %if¶actΩ≥Í´±
  141. %if®&1º>¶A)Ôr®&2º>¶B)Û≥±Ûkip±
  142. %window≤8±00µ50±76Â
  143. NotÒuite.
  144. %s√±Í∂
  145. %w
  146. %if¶9Ûkip±
  147. %sfx≥
  148. 2†8∂0∞±10
  149. 2†8∂0∞±10
  150. 2±6∂4∞±10
  151. %sπ‰id1
  152. %w
  153. %window 28 100 550 176 j point
  154.  
  155. %m 7
  156. %unbox
  157. %if˛&back¯¶6„ode≤≠6Û≥∞ÊontÛys‚color≥
  158. %if¶backÛ≤¢except±4±5"¯¶E¯¶F¯¶GÛ≥∞Û±∞Û≤∞
  159. %box±2±36¥34±96˜rapÔn„enterÔn
  160. Let'sÛay˘ou'dÏikeÙoÁetÚidÔfÙhe˜ord
  161. "gigantic"ÈnÙheÌiddleÔfÙheÊirstaragraph.
  162. %get act
  163.  
  164. %m 8
  165. %if˛&backÛkip±
  166. %unbox
  167. %s≤¢except±4±5"
  168. %x¶6Âraserect≥4∂8µ76±73¯¶F¯¶G
  169. %box±2±36¥34±96Û≤∞Û¡∞Û¬∞
  170. %w
  171. %e
  172. %point
  173. MoveÙheointerÛoÈt'sÍustÙoÙheÏeftÔfÙhe
  174. letter¢g"Èn¢gigantic."
  175.  
  176. Then,ËoldingÙheÌouse‚utton‰own,‰rag
  177. acrossÙhe˜ordıntilÈt'sËighlighted.
  178. %window≥4≥4µ76±73ÊontÌonaco.9
  179. %s·rea±∞∞∞π
  180. %code≤∂ÊontÛys
  181. %if¶actΩ≥Û±µ6Û≤≥Û¡∂4Û¬≥¯¶6„ode≤≠6ÊontÛys‚color≥Í´±
  182. %s≥±
  183. %if®((&1=56)Ôr®&1=55))·nd®&2=3)·nd®&B=3)·nd®(&A=64)Ôr®&A=65)))Ûkip±
  184. %window≥2±42¥10±92Â
  185. NotÒuite.
  186. %j point
  187. %w
  188. %sfx≤
  189. 2±6∂0∞±10
  190. 2±6∂4∞±10
  191.  
  192. %m 9
  193. %if¶backÍ‚ack
  194. %box±2±42¥22±96
  195. That'sÚight.†Now,ÙoÂraseÙhe˜ord,ressÙhe
  196. DeleteÎey.
  197. %s¥ƒelete
  198. %get any
  199. %if¶actΩ≥Í´±
  200. %if &key <> 127 rem key j get
  201. %sfxµ
  202. 2†8∂4∞±10
  203. 2†8∂4∞±10
  204. 2±6∂4∞±10
  205. 2±6∂0∞±10
  206. 2±6∂4∞±10
  207.  
  208. %m 10
  209. %unbox
  210. %s≤¢except∞±¥±4±5"
  211. %x¶6Âraserect≥4µ6µ76±73¯¶F¿wt∞≤¯¶GÛ≥∞Û≤∞
  212. %box±2±42¥22±96
  213. You„anÙakeÔut·˜holeÛentenceÍust·s
  214. easily.†Let'sÛay˘ou˜antÙo‰eleteÙheÛecond
  215. sentenceÔfÙheÛecondaragraph.†Press“eturnÙoÙryÈt.
  216. %get act
  217.  
  218. %m 11
  219. %unbox
  220. %if¶backınboxÛ≤¢except±4±5"¯¶6¯¶F¯¶GÛ≥∞Û≤∞
  221. %box±2±25¥34±96
  222. %point
  223. MoveÙheointerÛoÈt'sÍustÙoÙheÏeftÔfÙhe˜ord¢We"
  224. in¢WeÙrudgedÊorward."
  225.  
  226. HoldingÙheÌouse‚utton‰own,‰ragÙoÙheÚightÙoÌoveÙheointer
  227. toÙheÂndÔfÙheÛentence.†ThenÚeleaseÙheÌouse‚utton.
  228.  
  229. %window≥4≥4µ76±73ÊontÌonaco.9
  230. %s·rea±∞∞∞π
  231. %code≤∂ÊontÛys
  232. %if¶actΩ≥Û±¥9Û≤∂Û¡∑0Û¬∂¯¶6„ode≤≠6ÊontÛys‚color≥Í´±
  233. %s≥±
  234. %if®((&1<51)·nd(&1>47))·nd®&2=6)·nd®&B=6)·nd®(&A>68)·nd(&A<72)))Ûkip±
  235. %window≥2±31¥10±92Â
  236. NotÒuite.
  237. %j point
  238. %w
  239. %sfx≥
  240. 2†8∂4∞±10
  241. 2†8∂4∞±10
  242. 2†8∂0∞±10
  243.  
  244. %m 12
  245. %if¶backÍ‚ack
  246. %window≥2±31¥10±92Â
  247. Good.ŒowÙhat˘ouËaveÙheÛentenceËighlighted,
  248. pressƒeleteÙoÚemoveÈt.
  249. %s 4 "Delete" get any
  250. %if¶actΩ≥Í´±
  251. %if &key <>127 rem key j get
  252. %sfx¥
  253. 2±6∂4∞±10
  254. 2†8∂4∞±10
  255. 2†8∂0∞±10
  256. 2±6∂4∞±10
  257.  
  258. %m 13
  259. %unbox
  260. %if¶backΩ∞Ûkip±
  261. %w
  262. %s≤¢only∏±0±1±2±3"¯¶6Âraserect≥4±02µ76±73¯¶F¿wt∞∂¯¶G
  263. %box±2±25¥34±96˜rapÔff„enterÔff
  264. RememberÙheseÙwoÛtepsÊor‰eletingÙext:
  265.  
  266. 1.»ighlight˜hat˘ou˜antÙo‰elete--words,
  267. ††paragraphs,Ûentences,˜holeages.
  268.  
  269. 2.≈raseÈt·ll·tÔnce‚yressingƒelete.
  270. %wrap on center on get act
  271.  
  272. %m 14
  273. %unbox
  274. %if¶back‚color±Âraserect≥4±45µ76±73‚color≥
  275. %box±2π7¥32±39
  276. NowÏet'sÛay˘ou·dd·notheraragraphÙo˘ourÛtory.
  277. %get act
  278.  
  279. %m 15
  280. %if˛&backÛkip±
  281. %if¶2<9ınboxÛ≤¢except¥π±4±5"¯¶E¯¶F¯¶G
  282. %fontÛys‚ox±2π7¥32±40‚color±Âraserect≥4±46µ76±73‚color≥
  283. %w
  284. %x¶6Û≤¢only±4±5"¯¶F¿wt∞±0¯¶GÛ≥∞Û≤∞
  285. %window≥2±03¥08±35Â
  286. But˜hen˘ouÚeadÈtÔver,˘ouÚealizeÈt˜ould˜ork‚etter·sÙhe
  287. firstaragraphÔfÙhe„hapter.†You‰on'tËaveÙo‰elete·ndÚetype.
  288. You„anÌoveÈt.
  289. %get act
  290.  
  291. %m 16
  292. %unboxÛ≥∞
  293. %if˛&backÛkip±
  294. %bcolor±Âraserect≥4±46µ76±73
  295. %s≤¢only∞±≤≥µ∂∑∏±0±1±2±3±4±5"ınbox¯¶6¯¶F¯¶G
  296. %w
  297. %box±2∑0¥60±40
  298. FirstËighlight˜hat˘ou˜antÙoÌove.
  299. %point
  300.  
  301. %wrapÔff„enterÔff
  302. &P–laceÙheointerÍust‚eforeÙheÏetter¢T"Èn¢The."
  303. &PƒragÙheointer·cross·nd‰ownıntilÙhe˜hole
  304. †aragraphÈsËighlighted.
  305. &P‘henÚeleaseÙheÌouse‚utton.
  306. %wrapÔn„enterÔn
  307. %window≥4≥4µ76±73ÊontÌonaco.9
  308. %s·rea±∞∞∞±2
  309. %code≤∂ÊontÛys
  310. %if¶actΩ≥Û±∞Û≤±0Û¡≤5Û‚±1¯¶6„ode≤≠6ÊontÛys‚color≥Í´±
  311. %s≥±Ûπ∞Û√∞
  312. %if®®(&1Ω∞)·nd®&2=10))Ôr®&2=9))Ûπ±
  313. %if®®(&A>=24)·nd®&B=11))Ôr®&B>11))Û√±
  314. %if®&9·nd¶C)Ûkip±
  315. %window≥2∑6¥36±36Â
  316. NotÒuite.†ToËighlightÙhearagraph:
  317. %j point
  318. %w
  319. %sfx≤
  320. 2†8∂0∞±10
  321. 2†8∂0∞±10
  322. %s≥∞
  323.  
  324. %m 17
  325. %if¶backÍ‚ack
  326. %box±2π6¥40±40
  327. Good.†You'veÛelectedÙheÙext˘ou˜antÙo
  328. move.
  329.  
  330. &PŒowull‰ownÙhe
  331. %boldÔn
  332. Edit
  333. %boldÔff
  334. menu·nd„hoose
  335. %boldÔn
  336. Cut.
  337. %boldÔffÛ¥≈ditÛµ√ut
  338. %get menu
  339. %if¶actΩ≥Í´±
  340. %if &sel <> 3001 rem menu j get
  341. %sfx≥
  342. 2†8∂0∞±10
  343. 2†8∂0∞±10
  344. 2±6∂4∞±10
  345.  
  346. %m 18
  347. %if¶backınbox
  348. %bcolor±Âraserect≥4±46µ76±73‚color≥
  349. %if¶back‚ox±2π6¥40±40
  350. %e˜rapÔn
  351. TheÙext˘ouÛelected‰isappears,‚utÈtÈsn't
  352. goneÊorÁood.†It's‚eenutÈntoÙemporary
  353. storageÔnÙhe√lipboard--aÛpecial·reaÔfÙhe
  354. computer'sÌemory.
  355. %get act
  356.  
  357. %m 19
  358. %unbox
  359. %if¶backΩ∞Ûkip±
  360. %hilite≥4¥6≥5µ6∞
  361. %w
  362. %box±2±25≥92±96
  363. %wrapÔn
  364. You˜antÙoÈnsertÙheÙextınderÙhe˜ords¢Chapter≥8."
  365.  
  366. ToÙellÙhe¡pple¶NÙoutÈtÙhere,ÌoveÙheointer
  367. soÙhatÈt's·tÙheÏeftÂdgeÔfÙhe‚lankÏine‚eneath
  368. "Chapter≥8"·nd„lick.
  369. %code∞µ
  370. %point
  371. %code≤±9„ode∞±3
  372. %if¶actΩ≥Ëilite≥4¥6≥5µ6∞Í´±
  373. %if®&1æ≤7)·nd®&1º¥1)·nd®&2æ¥3)·nd®&2ºµ7)Ûkip±
  374. %e
  375. MoveÙheointer
  376. soÙhatÈt's·tÙheÏeftÂdgeÔfÙheÏine‚eneath
  377. "Chapter≥8"·nd„lick.
  378. %j point
  379. %w
  380. %hilite≥4¥6≥5µ6∞
  381. %sfx≤
  382. 2±6∂0∞±10
  383. 2±6∂4∞±10
  384.  
  385. %m 20
  386. %if¶backınboxÛ≤¢except¥π±4±5"¯¶E¯¶F¯¶GËilite≥4¥6≥5µ6∞
  387. %box±2±47≥92±90
  388. Now,ÙoÈnsertÙhearagraph,„hoose
  389. %boldÔn
  390. Paste
  391. %boldÔff
  392. fromÙhe
  393. %boldÔn
  394. Edit
  395. %boldÔffÛ¥≈ditÛµ–aste
  396. menu.
  397. %get menu 3003
  398. %if¶actΩ≥Í´±
  399. %if &sel <> 3003 rem menu j get
  400. %sfxµ
  401. 2†8∂0∞±10
  402. 2†8∂0∞±10
  403. 2±6∂4∞±10
  404. 2±6∂0∞±10
  405. 2±6∂4∞±10
  406.  
  407. %m 21
  408. %unbox
  409. %x¶6Âraserect≥4¥6µ76±73Û≤¢only±4±5±≤≥µ∂∑∏±0±1±2±3"
  410. %x¶F¿wt∞≤¯¶G
  411. %box±2±07¥30±96
  412. That'sÈt.†RememberÙheseÊourÛtepsÊorÌovingÙextÊromÔnelace
  413. to·nother:
  414.  
  415. %wrapÔff
  416. 1.†SelectÙheÙext˘ou˜antÙoÌove.
  417. %wrapÔn
  418. 2.†Choose
  419. %boldÔn
  420. Cut
  421. %boldÔff
  422. fromÙhe
  423. %boldÔn
  424. Edit
  425. %boldÔff˜rapÔff„enterÔff
  426. menu.
  427. 3.†PlaceÙheÈnsertionoint˜here˘ou˜antÙhe
  428. ††ÙextÙoÁo.
  429. %wrapÔn
  430. 4.†PasteÈtÈn‚y„hoosing
  431. %boldÔn„enterÔn
  432. Paste
  433. %boldÔff
  434. fromÙhe
  435. %boldÔn
  436. Edit
  437. %boldÔff
  438. menu.
  439. %get act
  440.  
  441. %m 22
  442. %if˛&backÛkip±
  443. %unboxÛƒÀing
  444. %s≤¢only∞±±4±5±≤≥µ∂∑∏±0±1±2±3"
  445. %sƒÀingÛ±˜p.txt¯¶E¯¶F¯¶G‚ox±2±07¥40±96
  446. %w
  447. %e
  448. NowÛuppose˘ou'veÊinished˘ourÓovel.†It's∏97agesÏong.†AtÙhis
  449. point,˘ouÚealize˘ou'veÌisspelledÙheÓame
  450. of·nÈmportantÌountain.…tÌight
  451. take‰aysÙo„hangeÈtÈf˘ou˜ere˜orkingÔn·Ùypewriter.†With˘our
  452. wordrocessingrogram,˘ou„an„hangeÈtÈnÌinutes.
  453.  
  454. Choose
  455. %boldÔn
  456. Change
  457. %boldÔff
  458. fromÙhe
  459. %boldÔn
  460. Search
  461. %boldÔffÛ¥”earchÛµ√hange
  462. menu.
  463. %get menu
  464. %if¶actΩ≥Í´±
  465. %if &sel <> 5002 rem menu j get
  466. %sfx≤
  467. 2±6∂4∞±10
  468. 2±6∂0∞±10
  469.  
  470. %m 23
  471. %unbox
  472. %if˛&backÛkip±
  473. %s≤¢only∞±±4±5±≤≥µ∂∑∏±0±1±2±3"
  474. %sƒÀingÛ±˜p.txt¯¶E¯¶F¯¶G
  475. %w
  476. %bcolor±
  477. %eraserect†97¥4µ03†112†setpensize≥±
  478. %framerect±00¥5µ00†108
  479. %framerect±04¥7¥96†106
  480. %moveto±24∂2
  481. Find◊hat
  482. %framerect≤05µ2¥70∂5
  483. %moveto±24∑9
  484. Change‘o
  485. %framerect≤05∂9¥70∏2
  486. %framerrect±35∏8≤45±01
  487. %framerrect≥20∏7¥30±02
  488. %framerrect≥24∏9¥26±00
  489. %moveto≥43π8Ûetpensize±±
  490. FindŒext
  491. %moveto±52π8
  492. Change¡ll
  493. %bcolor≥
  494.  
  495. %box±2±27¥16±96
  496. You'reÁoingÙo·sk˘our˜ordrocessing
  497. programÙoÊindÂveryÈnstanceÔfÙhe˜ord
  498. "King"·nd„hangeÈtÙo¢Kong."
  499. %get act
  500.  
  501. %e
  502. InÙhe¢Find◊hat"‚ox,Ùype
  503. %boldÔn
  504. King.
  505. %boldÔff
  506. (If
  507. youÌake·Ìistake,ıseÙheƒeleteÎeyÙo
  508. backspace·ndÙhen„orrectÈt.)
  509.  
  510. When˘ou'reÊinished,ressÙhe‘abÎeyÙo
  511. moveÙoÙheÓext‚ox.
  512. %autoexitÔnÏcÔn
  513. %s≥¢king"Û¥¢King"‚color±
  514. %moveto 210 62 get "" 4 bcolor 3
  515. %if (&act <> 3) and (&ans s<> &3) x &8 rem inp bcolor 1 j get
  516. %if®&actΩ≥)·nd®&ansÛ<>¢")¯¶8ÚemÈnp‚color±ÍÁet
  517. %if¶actΩ≥Ìoveto≤10∂2¯¢King"
  518. %s¥‘ab¯¶8Â
  519. NowressÙhe‘abÎeyÙoÌoveÙoÙheÓext‚ox.
  520. %get any
  521. %if¶actΩ≥Ûkip±
  522. %if &key <> 9 x &8 rem key j get
  523. %sfx≤
  524. 2†8∂4∞±10
  525. 2†8∂4∞±10
  526. %w
  527.  
  528. %x¶8Â
  529. InÙhe¢Change‘o"‚ox,Ùype
  530. %boldÔn
  531. Kong.
  532. %boldÔff
  533. (If
  534. youÌake·Ìistake,ıseÙheƒeleteÎeyÙo
  535. backspace·ndÙhen„orrectÈt.)
  536.  
  537. When˘ou'reÊinished,„lick√hange¡ll.
  538. %s≥¢kong"Û¥¢Kong"‚color±
  539. %window 51 117 464 172 moveto 210 79 get "" 4 bcolor 3
  540. %if (&act <> 3) and (&ans s<> &3) x &8 rem inp bcolor 1 j get
  541. %if®&actΩ≥)·nd®&ansÛ<>¢")¯¶8ÚemÈnp‚color±ÍÁet
  542. %if¶actΩ≥Ìoveto≤10∑9¯¢Kong"
  543. %autoexitÔff¯¶8
  544. %code∞µÛ·rea≥±38∏9≤42±00Û¥ßthe¢Change¡ll"‚utton'
  545. %get any
  546. %if¶actΩ≥Ëilite·rea≥±Ûkip±
  547. %if &act <> -3 rem click j get
  548. %sfx¥
  549. 2†8∂4∞±10
  550. 2†8∂4∞±10
  551. 2†8∂0∞±10
  552. 2†8∂0∞±10
  553. %w
  554.  
  555. %m 24
  556. %unbox
  557. %s≤¢only∞±±4±5±≤≥µ∂∑∏±0±1±2±3"
  558. %sƒÀong¯¶E¯¶F¯¶G
  559. %box±2±46≥68±96
  560. "Mt.Àing"ÈsÙransformedÙo¢Mt.Àong,"Âffortlessly.
  561. You„an„hange·ny˜ordÔrhraseÈn˘our‰ocumentÈn
  562. theÛame˜ay.
  563. %get act
  564. %sfxÌenu2exit„ode∞≤2˜ait¥2
  565. %code∞±0‚color±
  566. %linkÌenu
  567.